﻿
Partial Class pagWebs_index
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Response.CacheControl = "no-cache"
        Response.AddHeader("Pragma", "no-cache")
        Response.Expires = -1
        '***********************************************************'
        Session("sEVOLTA") = Nothing
    End Sub
    Public ReadOnly Property empresa() As String
        Get
            Return txtEmpresa.Text.Trim
        End Get
    End Property
    Public ReadOnly Property usuario() As String
        Get
            Return txtUsuario.Text.Trim
        End Get
    End Property
    Public ReadOnly Property contraseña() As String
        Get
            Return txtPassword.Text.Trim
        End Get
    End Property
    Public Property mensaje() As String
        Get
            Return lblError.Text.Trim
        End Get
        Set(ByVal value As String)
            lblError.Text = value
        End Set
    End Property

End Class
